gridlayout::grid_page(
  layout = "
| 1rem  | 250px   | 1fr    |
|-------|---------|--------|
| 100px | header  | header |
| 1fr   | sidebar |  blue  |
| 1fr   | sidebar |  plot  |",
  gridlayout::grid_card_text(
    area = "header",
    title = "My App"
  ),
  gridlayout::grid_card(
    area = "sidebar",
    item_alignment = "center",
    item_gap = "12px",
    shiny::sliderInput(
      inputId = "bins",
      label = "Number of Bins",
      min = 5L,
      max = 100L,
      value = 30L,
      step = 1L,
      width = "100%"
    )
  ),
  gridlayout::grid_card(
    area = "plot",
    item_alignment = "center",
    item_gap = "12px",
    shiny::plotOutput(
      outputId = "bluePlot",
      width = "100%",
      height = "400px"
    )
  ),
  gridlayout::grid_card(
    area = "blue",
    item_alignment = "center",
    item_gap = "12px",
    shiny::plotOutput(
      outputId = "distPlot",
      width = "100%",
      height = "400px"
    )
  )
)
